home *** CD-ROM | disk | FTP | other *** search
/ El Mac 9 / El Mac 9.iso / Shareware / Applications / Charting Coach v1.5 / Charting Coach v1.dxr / 00164.ls < prev    next >
Encoding:
Text File  |  1996-04-08  |  420 b   |  19 lines
  1. on mouseUp
  2.   global stamp, correctionMade
  3.   if the doubleClick then
  4.     exit
  5.   end if
  6.   cursor(4)
  7.   if count(stamp) > 0 then
  8.     set correctionMade to 0
  9.     hideDays()
  10.     put " " into field "problem"
  11.     go("monthly")
  12.     showMonthlyDays()
  13.     cursor(0)
  14.   else
  15.     cursor(0)
  16.     alert("Monthly Calendar will not function until the first entry is charted or the cycle is changed using the Options button.")
  17.   end if
  18. end
  19.